home *** CD-ROM | disk | FTP | other *** search
/ Floppyshop 2 / Floppyshop - 2.zip / Floppyshop - 2.iso / art&graf.ix / art-0022 / imagine.def < prev    next >
Text File  |  1997-04-16  |  11KB  |  348 lines
  1. { IMAGINE Version 1.1 Definition file           }
  2. {         12-September-1988                     }
  3. { (c) by IMAGIC Grafik,   D-7447 Aichtal-Aich.  }
  4.  
  5. { constants: }
  6. CON  HIGH       =    2; { resolutions }
  7. CON  MEDIUM     =    1;
  8. CON  LOW        =    0;
  9.  
  10. CON  UP         =    2; { directions }
  11. CON  DOWN       =    1;
  12. CON  LEFT       =    3;
  13. CON  RIGHT      =    4;
  14. CON  DIAGONAL   =    5;
  15.  
  16. CON  FULL       =    $FFFF;  { full line }
  17. CON  HALF_1     =    $AAAA;  { half line - I }
  18. CON  HALF_2     =    $5555;  { half line - II }
  19.  
  20. CON  ALL        =    %1111;  { all mirrors }
  21. CON  IN         =    1;      { flap_in  mode }
  22. CON  OUT        =    2;      { flap_out mode }
  23. CON  SOURCE     =    2;      { redraw picture }
  24. CON  DESTIN     =    1;      { redraw picture }
  25.  
  26. { Fading modes: }
  27. CON  M_REPLACE  =    0;      { replace }
  28. CON  M_AND      =    1;      { and }
  29. CON  M_OR       =    2;      { or }
  30. CON  M_XOR      =    3;      { xor }
  31. CON  M_NOT      =    4;      { not }
  32. CON  M_CHANGE   =    5;      { change }
  33. CON  M_TRANSP   =    6;      { transparent }
  34. CON  M_INVTRAN  =    7;      { invers transparent }
  35.  
  36. { Text constants: }
  37. CON  T_NORMAL   =    0; { for TMODE and TROT }
  38.  
  39. CON  T_TRANSP   =    1;
  40. CON  T_XOR      =    2;
  41.  
  42. CON  T_STD      =    -1; { reset to standard font }
  43.  
  44. CON  T_BOLD     =    %00001;
  45. CON  T_LIGHT    =    %00010;
  46. CON  T_ITALIC   =    %00100;
  47. CON  T_OUTLINED =    %10000;
  48.  
  49. CON  T_VERTICAL =    1;
  50.  
  51. CON  T_LEFT     =    -1;
  52. CON  T_RIGHT    =    -2;
  53. CON  T_UP       =    -1;
  54. CON  T_DOWN     =    -2;
  55. CON  T_CENTER   =    -3;
  56. CON  T_BLOCK    =    -4;
  57. CON  T_SAME     =    -5;
  58. CON  T_NEXT     =    -6;
  59.  
  60. { screens, colors and patterns: }
  61. SCR  ATARI   = $0000;
  62. SCR  BLACK   = $7F00;    { colors }
  63. SCR  WHITE   = $7F01;
  64. SCR  RED     = $7F02;
  65. SCR  GREEN   = $7F03;
  66. SCR  BLUE    = $7F04;
  67. SCR  CYAN    = $7F05;
  68. SCR  YELLOW  = $7F06;
  69. SCR  MAGENTA = $7F07;
  70. SCR  LWHITE  = $7F08;
  71. SCR  LBLACK  = $7F09;
  72. SCR  LRED    = $7F0A;
  73. SCR  LGREEN  = $7F0B;
  74. SCR  LBLUE   = $7F0C;
  75. SCR  LCYAN   = $7F0D;
  76. SCR  LYELLOW = $7F0E;
  77. SCR  LMAGENTA= $7F0F;
  78.  
  79. SCR  GREY    = $7F13;
  80. SCR  PAT_1   = $7F10;   { VDI standard patterns } 
  81. SCR  PAT_2   = $7F11;
  82. SCR  PAT_3   = $7F12;
  83. SCR  PAT_4   = $7F13;
  84. SCR  PAT_5   = $7F14;
  85. SCR  PAT_6   = $7F15;
  86. SCR  PAT_7   = $7F16;
  87. SCR  PAT_8   = $7F17;
  88. SCR  PAT_9   = $7F18;
  89. SCR  PAT_10  = $7F19;
  90. SCR  PAT_11  = $7F1A;
  91. SCR  PAT_12  = $7F1B;
  92. SCR  PAT_13  = $7F1C;
  93. SCR  PAT_14  = $7F1D;
  94. SCR  PAT_15  = $7F1E;
  95. SCR  PAT_16  = $7F1F;
  96. SCR  PAT_17  = $7F20;
  97. SCR  PAT_18  = $7F21;
  98. SCR  PAT_19  = $7F22;
  99. SCR  PAT_20  = $7F23;
  100. SCR  PAT_21  = $7F24;
  101. SCR  PAT_22  = $7F25;
  102. SCR  PAT_23  = $7F26;
  103. SCR  PAT_24  = $7F27;
  104. SCR  PAT_25  = $7F28;
  105. SCR  PAT_26  = $7F29;
  106. SCR  PAT_27  = $7F2A;
  107. SCR  PAT_28  = $7F2B;
  108.  
  109. SCR  SPEC_1  = $7F2C;  { special patterns }
  110. SCR  SPEC_2  = $7F2D;
  111. SCR  SPEC_3  = $7F2E;
  112. SCR  SPEC_4  = $7F2F;
  113. SCR  SPEC_5  = $7F30;
  114. SCR  SPEC_6  = $7F31;
  115. SCR  SPEC_7  = $7F32;
  116. SCR  SPEC_8  = $7F33;
  117. SCR  SPEC_9  = $7F34;
  118. SCR  SPEC_10 = $7F35;
  119. SCR  SPEC_11 = $7F36;
  120. SCR  SPEC_12 = $7F37;
  121.  
  122. SCR  BACK_1  = $7F38;  { backround patterns }
  123. SCR  BACK_2  = $7F39;
  124. SCR  BACK_3  = $7F3A;
  125. SCR  BACK_4  = $7F3B;
  126. SCR  BACK_5  = $7F3C;
  127. SCR  BACK_6  = $7F3D;
  128. SCR  BACK_7  = $7F3E;
  129. SCR  BACK_8  = $7F3F;
  130. SCR  BACK_9  = $7F40;
  131. SCR  BACK_10 = $7F41;
  132. SCR  BACK_11 = $7F42;
  133. SCR  BACK_12 = $7F43;
  134. SCR  BACK_13 = $7F44;
  135. SCR  BACK_14 = $7F45;
  136. SCR  BACK_15 = $7F46;
  137. SCR  BACK_16 = $7F47;
  138. SCR  BACK_17 = $7F48;
  139. SCR  BACK_18 = $7F49;
  140. SCR  BACK_19 = $7F4A;
  141. SCR  BACK_20 = $7F4B;
  142.  
  143. SCR  SCREEN  = $FFFF; { physical screen }
  144.  
  145. { fading algorithms: }
  146. FAD  ELOCIN    =  1 ( WORD:7 [ZM=0], WORD [LM=FULL], SWORD [Anzahl=500],
  147.                       SCALEX [X1=250], SCALEY [Y1=250], SCALEX [X2=750],
  148.                       SCALEY [Y2=750], SWORD [V_X1=8], SWORD [V_Y1=-1],
  149.                       SWORD [V_X2=-5], SWORD [V_Y2=1] );
  150.  
  151. FAD  DRAGON    =  2 ( WORD:7 [ZM=0], WORD [LM=FULL] );
  152.  
  153. FAD  SIMPLE    =  3 ( WORD:7 [ZM=0], WORD [LM=FULL] );
  154.  
  155. FAD  BLOOM     =  4 ( WORD:7 [ZM=0], WORD [LM=FULL] );
  156.  
  157. FAD  HELI      =  5 ( WORD:7 [ZM=0], WORD [LM=FULL] );
  158.  
  159. FAD  HRIGHT    =  6 ( WORD:7 [ZM=0], WORD [LM=FULL],
  160.                       SCALEX [X=500], SCALEY [Y=500] );
  161.  
  162. FAD  HLEFT     =  7 ( WORD:7 [ZM=0], WORD [LM=FULL], 
  163.                       SCALEX [X=500], SCALEY [Y=500] );
  164.  
  165. FAD  FRAME     =  8 ( WORD:7 [ZM=0], WORD [LM=FULL],
  166.                       SCALEX [X1=0], SCALEY [Y1=0], SCALEX [X2=999], 
  167.                       SCALEY [Y2=999], SCALEX [Breite=50] );
  168.  
  169. FAD  SUNRISE   =  9 ( WORD:7 [ZM=0], WORD [LM=FULL], WORD [Anzahl=500], 
  170.                       SCALEX [X=500], SCALEY [Y=500] );
  171.  
  172. FAD  MIKADO    = 10 ( WORD:7 [ZM=0], WORD [LM=FULL], WORD [Anzahl=500] );
  173.  
  174. FAD  DAZZLE    = 11 ( WORD:1000 [Pause=100],
  175.                       WORD:999 [X=500], WORD:999 [Y=500] );
  176.  
  177. FAD  CHESS     = 12 ( WORD:1000 [Pause=50], SBYTE:5 [Maske=1] );
  178.  
  179. FAD  FLASH     = 13 ( WORD:1000 [Pause=50], SBYTE:5 [Maske=4] );
  180.  
  181. FAD  FLIP      = 14 ( WORD:1000 [Pause=10], BYTE:4 [Richtung=RIGHT] );
  182.  
  183. FAD  HARD      = 15 ( WORD:1000 [Pause=100] );
  184.  
  185. FAD  JOIN      = 16;
  186.  
  187. FAD  NOODLEWOOD = 17;
  188.  
  189. FAD  SCROLL    = 18 ( WORD:1000 [Pause=0], WORD:4 [Richtung=UP], 
  190.                       SCALEX [X1=250], SCALEY [Y1=250],
  191.                       SCALEX [X2=750], SCALEY [Y2=750] );
  192.  
  193. FAD  SNAKE     = 19 ( WORD:1000 [Pause=0] );
  194.  
  195. FAD  SPLIT     = 20;
  196.  
  197. FAD  SHIFT     = 21;
  198.  
  199. FAD  SNEEZE    = 22 ( WORD:1000 [Anzahl=100], SCALEX [Radius=400],
  200.                       SCALEX [X=499], SCALEY [Y=499] );
  201.  
  202. FAD  RASTER    = 23 ( WORD:7 [ZM=0], WORD [LM=FULL] );
  203.  
  204. FAD  FOLLY     = 24 ( WORD:7 [ZM=0], WORD [LM=FULL], WORD [Anzahl=500],  
  205.                       SCALEX [X1=400], SCALEY [Y1=600], 
  206.                       SCALEX [X2=600], SCALEY [Y2=400] );
  207.  
  208. FAD  SMEARBOX  = 25 ( WORD:7 [Modus=0], SCALEX [X1=250], SCALEY [Y1=250], 
  209.                       SCALEX [X2=750], SCALEY [Y2=750], SCALEX [Start_x=0], 
  210.                       SCALEY [Start_y=0], SCALEX [Ende_x=1000], 
  211.                       SCALEY [Ende_y=1000], WORD [Schritte=200] );
  212.  
  213. FAD  FLIPPER   = 26 ( WORD:7 [ZM=0], WORD [LM=FULL], WORD [Anzahl=5000], 
  214.                       SCALEX [X=500], SCALEY [Y=500] );
  215.  
  216. FAD  VENICE    = 27 ( SWORD:31999 [Step_1=1], SWORD:31999 [Step_2=0], 
  217.                       WORD:31999 [Start=0], WORD:1000 [Pause_1=0], 
  218.                       WORD:1000 [Pause_2=0] );
  219.  
  220. FAD  FLAP_IN   = 28 ( WORD:1000 [Pause=100] );
  221.  
  222. FAD  FLAP_OUT  = 29 ( WORD:1000 [Pause=100] );
  223.  
  224. FAD  MEMORY    = 30 ( WORD:1000 [Pause=10], WORD:7 [Fenster=4], 
  225.                       BYTE:10 [Anzahl=3] );
  226.  
  227. FAD  FLAPS     = 31 ( WORD:1000 [Pause=50], SWORD:7 [Breite=-2] );
  228.  
  229. FAD  BLURB     = 32 ( WORD:1000 [Pause=10], WORD:20 [Streifen=3], 
  230.                       BYTE:2 [Modus=IN] );
  231.  
  232. FAD  BYTES     = 33 ( WORD:32000 [Anzahl=25000] );
  233.  
  234. FAD  BITS      = 34;
  235.  
  236. FAD  FASTSCROLL = 35 ( BYTE:4 [Richtung=UP] );
  237.  
  238. FAD  PLOT_TO   = 36 ( WORD:7 [ZM=0], WORD [LM=FULL], 
  239.                       SCALEX [X=500], SCALEY [Y=500] );
  240.  
  241. FAD  PLOTLINE  = 37 ( WORD:7 [ZM=0], WORD [LM=FULL], SCALEX [X1=200], 
  242.                       SCALEY [Y1=500], SCALEX [X2=800], SCALEY [Y2=500] );
  243.  
  244. FAD  CIRCLE    = 38 ( WORD:7 [ZM=0], WORD [LM=FULL], 
  245.                       SCALEX [X=500], SCALEY [Y=500], 
  246.                       SCALEX [Radius=250], SCALEX [Rand=5] );
  247.  
  248. FAD  BOTTLENECK = 39 ( SWORD:2 [Modus=1] );
  249.  
  250. FAD  BOX       = 40 ( WORD:7 [Modus=0], SCALEX [X1=250], SCALEY [Y1=250], 
  251.                       SCALEX [X2=750], SCALEY [Y2=750] );
  252.  
  253. FAD  SLIME     = 41 ( WORD:1000 [Pause=100], BYTE:2 [Richtung=DOWN] );
  254.  
  255. FAD  FLAP_UP   = 42 ( WORD:1000 [Pause=100] );
  256.  
  257. FAD  FLAP_DOWN = 43 ( WORD:1000 [Pause=100] );
  258.  
  259. FAD  ZIPPER    = 44;
  260.  
  261. FAD  MOVEBOX   = 45 ( WORD:7 [Modus=0], SCALEX [X1=250], SCALEY [Y1=250], 
  262.                       SCALEX [X2=750], SCALEY [Y2=750], SCALEX [Start_x=0], 
  263.                       SCALEY [Start_y=0], SCALEX [Ende_x=1000], 
  264.                       SCALEY [Ende_y=1000], WORD [Schritte=150] );
  265.  
  266. FAD  SWAP      = 46 ( BYTE:5 [Achse=DIAGONAL] );
  267.  
  268. FAD  CUBE_UP   = 47 ( WORD:1000 [Pause=200] );
  269.  
  270. FAD  CUBE_DOWN = 48 ( WORD:1000 [Pause=200] );
  271.  
  272. FAD  FADE_IN   = 49 ( WORD:1000 [Pause=200], WORD:$777 [Startwert=$000] );
  273.  
  274. FAD  FADE_OUT  = 50 ( WORD:1000 [Pause=200], WORD:$777 [Endwert=$000] );
  275.  
  276. FAD  DISC      = 51 ( SCALEX [X =499], SCALEY [Y=499],
  277.                       SCALEX [RX=1],  SCALEY [RY=1],
  278.                       SCALEX [SX=31], SCALEY [SY=50], 
  279.                       WORD:1000 [Anzahl=30] );
  280.                       
  281. FAD  DIAMOND   = 52 (  WORD:1000 [Pause=50], SBYTE:5 [Maske=1] );
  282.  
  283. { external modules: }
  284. MOD  WINDOW     = 1 ( SCALEX [X1=0], SCALEY [Y1=0], 
  285.                       SCALEX [X2=999], SCALEY [Y2=999]);
  286.  
  287. MOD  MIRROR     = 2 ( BYTE:%11111 [Achsen=%00001] );
  288.  
  289. MOD  REDRAW     = 3 ( WORD:7 [ZM=0], WORD [LM=FULL], 
  290.                       WORD:3999 [Anzahl=200], BYTE:2 [Bild=DESTIN] );
  291.  
  292. MOD  SPOT       = 13 ( WORD:15 [Nummer=0], SCALEX [X=500], SCALEY [Y=250] );
  293.  
  294. MOD  DEFAULT    = 4;
  295.  
  296. { text modules: }
  297. MOD  TCOLOR     = 5 ( WORD:15 [Zeichen =0], 
  298.                       WORD:15 [Hintergr=1] );
  299.  
  300. MOD  TFONT      = 6 ( SBYTE:2   [Font=T_STD], 
  301.                       SBYTE:100 [Groesse=0] );
  302.  
  303. MOD  TMODE      = 7 ( BYTE:19     [Modus =T_XOR], 
  304.                       BYTE:%11111 [Attrib=T_NORMAL] );
  305.  
  306. MOD  TSKEW      = 8 ( SWORD:100 [X-D=0], SWORD:100 [Y-D=0] );
  307.  
  308. MOD  TROT       = 9 ( BYTE:1 [China =0], 
  309.                       BYTE:3 [Richtung=0] );
  310. MOD  TRESET     = 10;
  311.  
  312. { color modules: }
  313. MOD  COLOR      = 11 ( WORD:15   [Farb-Nr=0], 
  314.                        WORD:$777 [RGB-Wert=$777] );
  315.  
  316. MOD  ALLCOLOR   = 12 ( SWORD:$777 [F00=-1], SWORD:$777 [F01=-1], 
  317.                        SWORD:$777 [F02=-1], SWORD:$777 [F03=-1], 
  318.                        SWORD:$777 [F04=-1], SWORD:$777 [F05=-1], 
  319.                        SWORD:$777 [F06=-1], SWORD:$777 [F07=-1], 
  320.                        SWORD:$777 [F08=-1], SWORD:$777 [F09=-1], 
  321.                        SWORD:$777 [F10=-1], SWORD:$777 [F11=-1], 
  322.                        SWORD:$777 [F12=-1], SWORD:$777 [F13=-1], 
  323.                        SWORD:$777 [F14=-1], SWORD:$777 [F15=-1] );
  324.  
  325. MOD  COLOR_ROT  = 14 ( WORD:7 [Slot=0], WORD:30000 [Pause=50],
  326.                        SWORD:15 [F00=-1], SWORD:15 [F01=-1],
  327.                        SWORD:15 [F02=-1], SWORD:15 [F03=-1],
  328.                        SWORD:15 [F04=-1], SWORD:15 [F05=-1],
  329.                        SWORD:15 [F06=-1], SWORD:15 [F07=-1],
  330.                        SWORD:15 [F08=-1], SWORD:15 [F09=-1],
  331.                        SWORD:15 [F10=-1], SWORD:15 [F11=-1],
  332.                        SWORD:15 [F12=-1], SWORD:15 [F13=-1],
  333.                        SWORD:15 [F14=-1], SWORD:15 [F15=-1] );
  334.  
  335. MOD  COLOR_STOP = 15;
  336.  
  337. MOD  RANDOM     = 16 ( SLONG [Start=19681002] );
  338.  
  339. MOD  SETMASK    = 17 ( WORD  [M0=$0],    WORD  [M1=$2],    WORD  [M2=$5], 
  340.                        WORD  [M3=$A],    WORD  [M4=$15],   WORD  [M5=$2A],
  341.                        WORD  [M6=$55],   WORD  [M7=$AA],   WORD  [M8=$155],        
  342.                        WORD  [M9=$2AA],  WORD [M10=$555],  WORD [M11=$AAF],
  343.                        WORD [M12=$155F], WORD [M13=$2AFF], WORD [M14=$57FF], 
  344.                        WORD [M15=$BFFF], WORD [M16=$FFFF] );
  345.  
  346. END;
  347.  
  348.